object NagScreen: TNagScreen Left = 332 Top = 201 HelpContext = 2003 ActiveControl = RegCodeEdit AutoSize = True BorderStyle = bsDialog Caption = 'Caption' ClientHeight = 309 ClientWidth = 434 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object ScrPnl: TPanel Left = 0 Top = 0 Width = 434 Height = 309 BevelOuter = bvNone TabOrder = 0 object Image5: TImage Left = 283 Top = 280 Width = 16 Height = 16 Picture.Data = {} Transparent = True end object SiteL: TLabel Left = 301 Top = 280 Width = 24 Height = 13 Cursor = crHandPoint Hint = 'Click here' Caption = 'SiteL' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False ParentShowHint = False ShowHint = True OnClick = SiteLClick OnMouseEnter = DiscountsMouseEnter OnMouseLeave = DiscountsMouseLeave end object Header1: TLabel Left = 7 Top = 4 Width = 62 Height = 20 Caption = 'Header1' Font.Charset = DEFAULT_CHARSET Font.Color = clGreen Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Header2: TLabel Left = 7 Top = 26 Width = 62 Height = 20 Caption = 'Header2' Font.Charset = DEFAULT_CHARSET Font.Color = clGreen Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Item1: TLabel Left = 4 Top = 52 Width = 26 Height = 13 Caption = 'Item1' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False end object Item2: TLabel Left = 4 Top = 120 Width = 26 Height = 13 Caption = 'Item2' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False end object Item3: TLabel Left = 4 Top = 198 Width = 26 Height = 13 Caption = 'Item3' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False end object Item1a: TLabel Left = 16 Top = 68 Width = 32 Height = 13 Caption = 'Item1a' end object Item1b: TLabel Left = 16 Top = 84 Width = 32 Height = 13 Caption = 'Item1b' end object Item1c: TLabel Left = 16 Top = 100 Width = 32 Height = 13 Caption = 'Item1c' end object Item2a: TLabel Left = 16 Top = 136 Width = 32 Height = 13 Caption = 'Item2a' end object Item2b: TLabel Left = 16 Top = 152 Width = 32 Height = 13 Caption = 'Item2b' end object Item3a: TLabel Left = 16 Top = 214 Width = 32 Height = 13 Caption = 'Item3a' end object Item3b: TLabel Left = 16 Top = 230 Width = 32 Height = 13 Caption = 'Item3b' end object License: TLabel Left = 332 Top = 198 Width = 37 Height = 13 Cursor = crHandPoint Hint = 'Click here' Caption = 'License' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False ParentShowHint = False ShowHint = True OnClick = LicenseClick OnMouseEnter = DiscountsMouseEnter OnMouseLeave = DiscountsMouseLeave end object Image1: TImage Left = 314 Top = 197 Width = 16 Height = 16 Picture.Data = {} Transparent = True end object Image2: TImage Left = 266 Top = 119 Width = 16 Height = 16 Picture.Data = {} Transparent = True end object Alternative: TLabel Left = 284 Top = 120 Width = 50 Height = 13 Cursor = crHandPoint Hint = 'Click here' Caption = 'Alternative' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False ParentShowHint = False ShowHint = True OnClick = AlternativeClick OnMouseEnter = DiscountsMouseEnter OnMouseLeave = DiscountsMouseLeave end object Image3: TImage Left = 264 Top = 51 Width = 16 Height = 16 Picture.Data = {} Transparent = True end object FreeGift: TLabel Left = 282 Top = 52 Width = 37 Height = 13 Cursor = crHandPoint Hint = 'Click here' Caption = 'FreeGift' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False ParentShowHint = False ShowHint = True OnClick = FreeGiftClick OnMouseEnter = DiscountsMouseEnter OnMouseLeave = DiscountsMouseLeave end object Image4: TImage Left = 176 Top = 51 Width = 16 Height = 16 Picture.Data = {} Transparent = True end object Discounts: TLabel Left = 194 Top = 52 Width = 47 Height = 13 Cursor = crHandPoint Hint = 'Click here' Caption = 'Discounts' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False ParentShowHint = False ShowHint = True OnClick = DiscountsClick OnMouseEnter = DiscountsMouseEnter OnMouseLeave = DiscountsMouseLeave end object OkBtn: TBitBtn Left = 8 Top = 275 Width = 81 Height = 27 Caption = '&Ok' Default = True ModalResult = 1 TabOrder = 4 OnClick = OkBtnClick NumGlyphs = 2 end object HelpBtn: TBitBtn Left = 96 Top = 275 Width = 81 Height = 27 Caption = '&Help' TabOrder = 5 OnClick = HelpBtnClick NumGlyphs = 2 end object UninstallBtn: TBitBtn Left = 184 Top = 275 Width = 81 Height = 27 Caption = '&Uninstall' ModalResult = 1 TabOrder = 6 Visible = False OnClick = UninstallBtnClick end object RegURL: TEdit Left = 16 Top = 168 Width = 353 Height = 21 ReadOnly = True TabOrder = 0 end object GoBtn: TBitBtn Left = 370 Top = 167 Width = 57 Height = 25 Cursor = crHandPoint Hint = 'Go Purchase' Caption = '&Go' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = GoBtnClick end object RegCodeEdit: TEdit Left = 16 Top = 246 Width = 353 Height = 21 TabOrder = 2 end object RegisterBtn: TBitBtn Left = 370 Top = 245 Width = 57 Height = 25 Cursor = crHandPoint Hint = 'Register Program' Caption = '&Register' ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = RegisterBtnClick end end end